package com.baitai.system.service.impl;

import java.math.BigDecimal;
import java.util.*;
import java.util.stream.Collectors;
import javax.validation.Validator;

import com.baitai.common.config.BaiTaiConfig;
import com.baitai.common.constant.CacheConstants;
import com.baitai.common.core.domain.entity.SysMenu;
import com.baitai.common.core.redis.RedisCache;
import com.baitai.common.exception.base.BaseException;
import com.baitai.common.utils.QRCodeGenerator;
import com.baitai.system.domain.vo.SysUserTeam;
import com.baitai.system.domain.vo.SysUserVo;
import com.baitai.system.mapper.*;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.beans.factory.annotation.Value;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.CollectionUtils;
import com.baitai.common.annotation.DataScope;
import com.baitai.common.constant.UserConstants;
import com.baitai.common.core.domain.entity.SysRole;
import com.baitai.common.core.domain.entity.SysUser;
import com.baitai.common.exception.ServiceException;
import com.baitai.common.utils.SecurityUtils;
import com.baitai.common.utils.StringUtils;
import com.baitai.common.utils.bean.BeanValidators;
import com.baitai.common.utils.spring.SpringUtils;
import com.baitai.system.domain.SysPost;
import com.baitai.system.domain.SysUserPost;
import com.baitai.system.domain.SysUserRole;
import com.baitai.system.service.ISysConfigService;
import com.baitai.system.service.ISysDeptService;
import com.baitai.system.service.ISysUserService;

/**
 * 用户 业务层处理
 *
 * @author ruoyi
 */
@Service
public class SysUserServiceImpl implements ISysUserService {
    private static final Logger log = LoggerFactory.getLogger(SysUserServiceImpl.class);

    @Autowired
    private SysUserMapper userMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysPostMapper postMapper;

    @Autowired
    private SysUserRoleMapper userRoleMapper;

    @Autowired
    private SysUserPostMapper userPostMapper;

    @Autowired
    private ISysConfigService configService;
    @Autowired
    private UserSignInRecordsMapper userSignInRecordsMapper;

    @Autowired
    private ISysDeptService deptService;

    @Value("${aliyun.oss.endpoint}")
    private String endpoint;

    @Value("${aliyun.oss.access-id}")
    private String accessKeyId;

    @Value("${aliyun.oss.access-key}")
    private String accessKeySecret;

    @Value("${aliyun.oss.dir}")
    private String filedir;

    @Value("${aliyun.oss.bucket}")
    private String bucketName;

    @Autowired
    protected Validator validator;
    @Autowired
    private RedisCache redisCache;

    /**
     * 根据条件分页查询用户列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    public List<SysUser> selectUserList(SysUser user) {

        if (!SecurityUtils.isAdmin(SecurityUtils.getUserId())) {
            user.setAncestor(SecurityUtils.getUserId().toString());
        }
        return userMapper.selectUserList(user);
    }

    /**
     * 根据条件分页查询已分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectAllocatedList(SysUser user) {
        return userMapper.selectAllocatedList(user);
    }

    /**
     * 根据条件分页查询未分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectUnallocatedList(SysUser user) {
        return userMapper.selectUnallocatedList(user);
    }

    /**
     * 通过用户名查询用户
     *
     * @param userName 用户名
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByUserName(String userName) {
        return userMapper.selectUserByUserName(userName);
    }

    /**
     * 通过用户名查询用户
     *
     * @param userPhone 用户名
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByUserPhone(String userPhone) {
        return userMapper.selectUserByUserPhone(userPhone);
    }


    /**
     * 通过用户ID查询用户
     *
     * @param userId 用户ID
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserById(Long userId) {
        return userMapper.selectUserById(userId);
    }

    /**
     * 通过用户手机号查询用户
     *
     * @param phone 用户手机号
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByPhonenumber(String phone) {
        return userMapper.selectUserByPhone(phone);
    }

    /**
     * 查询用户所属角色组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserRoleGroup(String userName) {
        List<SysRole> list = roleMapper.selectRolesByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysRole::getRoleName).collect(Collectors.joining(","));
    }

    /**
     * 查询用户所属岗位组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserPostGroup(String userName) {
        List<SysPost> list = postMapper.selectPostsByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysPost::getPostName).collect(Collectors.joining(","));
    }

    /**
     * 校验用户名称是否唯一
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public boolean checkUserNameUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkUserNameUnique(user.getUserName());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验手机号码是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public boolean checkPhoneUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkPhoneUnique(user.getPhonenumber());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验email是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public boolean checkEmailUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkEmailUnique(user.getEmail());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验用户是否允许操作
     *
     * @param user 用户信息
     */
    @Override
    public void checkUserAllowed(SysUser user) {
        if (StringUtils.isNotNull(user.getUserId()) && user.isAdmin()) {
            throw new ServiceException("不允许操作超级管理员用户");
        }
    }

    /**
     * 校验用户是否有数据权限
     *
     * @param userId 用户id
     */
    @Override
    public void checkUserDataScope(Long userId) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId())) {
            SysUser user = new SysUser();
            user.setUserId(userId);
            List<SysUser> users = SpringUtils.getAopProxy(this).selectUserList(user);
            if (StringUtils.isEmpty(users)) {
                throw new ServiceException("没有权限访问用户数据！");
            }
        }
    }

    /**
     * 新增保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int insertUser(SysUser user) {
        // 新增用户信息
        int rows = userMapper.insertUser(user);
        // 新增用户岗位关联
        insertUserPost(user);
        // 新增用户与角色管理
        insertUserRole(user);
        return rows;
    }

    /**
     * 注册用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public boolean registerUser(SysUser user) {
        return userMapper.insertUser(user) > 0;
    }

    /**
     * 修改保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int updateUser(SysUser user) {
        Long userId = user.getUserId();
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 新增用户与角色管理
        insertUserRole(user);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPostByUserId(userId);
        // 新增用户与岗位管理
        insertUserPost(user);
        return userMapper.updateUser(user);
    }

    /**
     * 用户授权角色
     *
     * @param userId  用户ID
     * @param roleIds 角色组
     */
    @Override
    @Transactional
    public void insertUserAuth(Long userId, Long[] roleIds) {
        userRoleMapper.deleteUserRoleByUserId(userId);
        insertUserRole(userId, roleIds);
    }

    /**
     * 修改用户状态
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserStatus(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户基本信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserProfile(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户头像
     *
     * @param userName 用户名
     * @param avatar   头像地址
     * @return 结果
     */
    @Override
    public boolean updateUserAvatar(String userName, String avatar) {
        return userMapper.updateUserAvatar(userName, avatar) > 0;
    }

    /**
     * 重置用户密码
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int resetPwd(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 重置用户密码
     *
     * @param userName 用户名
     * @param password 密码
     * @return 结果
     */
    @Override
    public int resetUserPwd(String userName, String password) {
        return userMapper.resetUserPwd(userName, password);
    }

    /**
     * 新增用户角色信息
     *
     * @param user 用户对象
     */
    public void insertUserRole(SysUser user) {
        this.insertUserRole(user.getUserId(), user.getRoleIds());
    }

    /**
     * 新增用户岗位信息
     *
     * @param user 用户对象
     */
    public void insertUserPost(SysUser user) {
        Long[] posts = user.getPostIds();
        if (StringUtils.isNotEmpty(posts)) {
            // 新增用户与岗位管理
            List<SysUserPost> list = new ArrayList<SysUserPost>(posts.length);
            for (Long postId : posts) {
                SysUserPost up = new SysUserPost();
                up.setUserId(user.getUserId());
                up.setPostId(postId);
                list.add(up);
            }
            userPostMapper.batchUserPost(list);
        }
    }

    /**
     * 新增用户角色信息
     *
     * @param userId  用户ID
     * @param roleIds 角色组
     */
    public void insertUserRole(Long userId, Long[] roleIds) {
        if (StringUtils.isNotEmpty(roleIds)) {
            // 新增用户与角色管理
            List<SysUserRole> list = new ArrayList<SysUserRole>(roleIds.length);
            for (Long roleId : roleIds) {
                SysUserRole ur = new SysUserRole();
                ur.setUserId(userId);
                ur.setRoleId(roleId);
                list.add(ur);
            }
            userRoleMapper.batchUserRole(list);
        }
    }

    /**
     * 通过用户ID删除用户
     *
     * @param userId 用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserById(Long userId) {
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 删除用户与岗位表
        userPostMapper.deleteUserPostByUserId(userId);
        return userMapper.deleteUserById(userId);
    }

    /**
     * 批量删除用户信息
     *
     * @param userIds 需要删除的用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserByIds(Long[] userIds) {
        for (Long userId : userIds) {
            checkUserAllowed(new SysUser(userId));
//            checkUserDataScope(userId);
        }
        // 删除用户与角色关联
        userRoleMapper.deleteUserRole(userIds);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPost(userIds);
        return userMapper.deleteUserByIds(userIds);
    }

    /**
     * 导入用户数据
     *
     * @param userList        用户数据列表
     * @param isUpdateSupport 是否更新支持，如果已存在，则进行更新数据
     * @param operName        操作用户
     * @return 结果
     */
    @Override
    public String importUser(List<SysUser> userList, Boolean isUpdateSupport, String operName) {
        if (StringUtils.isNull(userList) || userList.size() == 0) {
            throw new ServiceException("导入用户数据不能为空！");
        }
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        for (SysUser user : userList) {
            try {
                // 验证是否存在这个用户
                SysUser u = userMapper.selectUserByUserName(user.getUserName());
                if (StringUtils.isNull(u)) {
                    BeanValidators.validateWithException(validator, user);
                    deptService.checkDeptDataScope(user.getDeptId());
                    String password = configService.selectConfigByKey("sys.user.initPassword");
                    user.setPassword(SecurityUtils.encryptPassword(password));
                    user.setCreateBy(operName);
                    userMapper.insertUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 导入成功");
                } else if (isUpdateSupport) {
                    BeanValidators.validateWithException(validator, user);
                    checkUserAllowed(u);
//                    checkUserDataScope(u.getUserId());
                    deptService.checkDeptDataScope(user.getDeptId());
                    user.setUserId(u.getUserId());
                    user.setUpdateBy(operName);
                    userMapper.updateUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 更新成功");
                } else {
                    failureNum++;
                    failureMsg.append("<br/>" + failureNum + "、账号 " + user.getUserName() + " 已存在");
                }
            } catch (Exception e) {
                failureNum++;
                String msg = "<br/>" + failureNum + "、账号 " + user.getUserName() + " 导入失败：";
                failureMsg.append(msg + e.getMessage());
                log.error(msg, e);
            }
        }
        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据格式不正确，错误如下：");
            throw new ServiceException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部导入成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

    @Override
    public String selectUserVersionById(Long userId) {
        return userMapper.selectUserVersionById(userId);
    }

    @Override
    public List<SysUser> selectRankingList() {
        return userMapper.selectRankingList();
    }

    @Override
    public int appUpdateUser(SysUser user) {
        return userMapper.appUpdateUser(user);
    }

    @Override
    public int updateUserList(Long parentId, String ancestor, Long[] idList) {
        return userMapper.updateUserList(parentId, ancestor, idList);
    }

    @Override
    public SysUserTeam myTeam(Long userId) {
        SysUserTeam my = userMapper.selectMy(userId);
        List<SysUserTeam> result = userMapper.selectMyTeam(userId);
        my.setSysUserTeams(result);
        return my;
    }

    @Override
    public SysUserTeam getUserInfo(Long userId) {
        SysUserTeam sysUserTeam = userMapper.selectMy(userId);
        if (StringUtils.isEmpty(sysUserTeam.getQrCode())) {
            String qrCode = QRCodeGenerator.generatorQRCode(BaiTaiConfig.getQRRegisterUrl() + "HPYOUTAO" + userId, "/home/baitai/tempFile", "/QRimage/QRDIR_" + userId + ".PNG", BaiTaiConfig.getUploadPath(),
                    endpoint, accessKeyId, accessKeySecret, filedir, bucketName);
            sysUserTeam.setQrCode(qrCode);
            SysUser user = new SysUser();
            user.setUserId(userId);
            user.setQrCode(qrCode);
            userMapper.updateUser(user);
        }
        return sysUserTeam;
    }

    public List<SysUserTeam> buildMenuTree(List<SysUserTeam> menus) {
        List<SysUserTeam> returnList = new ArrayList<SysUserTeam>();
        List<Long> tempList = menus.stream().map(SysUserTeam::getUserId).collect(Collectors.toList());
        for (Iterator<SysUserTeam> iterator = menus.iterator(); iterator.hasNext(); ) {
            SysUserTeam menu = (SysUserTeam) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (StringUtils.isEmpty(menu.getParentId()) || !tempList.contains(Long.parseLong(menu.getParentId()))) {
                recursionFn(menus, menu);
                returnList.add(menu);
            }
        }
        if (returnList.isEmpty()) {
            returnList = menus;
        }
        return returnList;
    }

    /**
     * 递归列表
     *
     * @param list 分类表
     * @param t    子节点
     */
    private void recursionFn(List<SysUserTeam> list, SysUserTeam t) {
        // 得到子节点列表
        List<SysUserTeam> childList = getChildList(list, t);
        t.setSysUserTeams(childList);
        for (SysUserTeam tChild : childList) {
            if (hasChild(list, tChild)) {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysUserTeam> getChildList(List<SysUserTeam> list, SysUserTeam t) {
        List<SysUserTeam> tlist = new ArrayList<SysUserTeam>();
        Iterator<SysUserTeam> it = list.iterator();
        while (it.hasNext()) {
            SysUserTeam n = (SysUserTeam) it.next();
            if (n.getParentId() != null && Long.parseLong(n.getParentId()) == t.getUserId().longValue()) {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysUserTeam> list, SysUserTeam t) {
        return getChildList(list, t).size() > 0;
    }

    @Override
    public List<SysUserVo> selectUserVoList(SysUser user) {
        if (!SecurityUtils.isAdmin(SecurityUtils.getUserId())) {
            user.setAncestor(SecurityUtils.getUserId().toString());
        }
        return userMapper.selectUserVoList(user);
    }

    @Override
    public String validatePhoneCaptcha(String username, String code) {
        String verifyKey = CacheConstants.REGISTER_KEY + username;
        String captcha = redisCache.getCacheObject(verifyKey);
        if (StringUtils.isEmpty(code)) {
            return "请输入验证码";
        }
        if (captcha == null) {
            return "验证码错误或已过期请重新发送";
        }
        if (!code.equalsIgnoreCase(captcha)) {
            return "验证码错误请重新输入";
        }
        redisCache.deleteObject(verifyKey);
        return "";
    }

    @Override
    public String setAncestor() {
        List<SysUserTeam> result = userMapper.selectMyAllTeam();
        result = buildMenuTree(result);
        for (SysUserTeam sysUserTeam : result) {
            updateAncestor(sysUserTeam, "");
        }
        return null;
    }

    private void updateAncestor(SysUserTeam sysUserTeam, String ancestor) {
        SysUser sysUser = userMapper.selectUserById(sysUserTeam.getUserId());
        String c = "";
        if (StringUtils.isNotEmpty(ancestor)) {
            sysUser.setAncestor(ancestor);
//            System.out.println("============="+ancestor);
            userMapper.updateUser(sysUser);
            c = ancestor + "," + sysUser.getUserId();
        } else {
            c = sysUser.getUserId() + "";
        }
        if (sysUserTeam.getSysUserTeams() != null && sysUserTeam.getSysUserTeams().size() > 0) {
            List<SysUserTeam> child = sysUserTeam.getSysUserTeams();
            for (SysUserTeam userTeam : child) {
                updateAncestor(userTeam, c);
            }
        }
    }

    @Override
    public void updateUserAppVersion(Long userId, String currVersion) {
        userMapper.updateUserAppVersion(userId, currVersion);
    }

    @Override
    public void updateUserCurrentApkversion(Long userId, String currentApkversion) {
        userMapper.updateUserupdateUserCurrentApkversion(userId, currentApkversion);
    }

    @Override
    public void updateUserPackageName(Long userId, String packageName) {
        userMapper.updateUserPackageName(userId, packageName);
    }

    @Override
    public void updateUserPhoneSha1(Long userId, String phoneSha1) {
        userMapper.updateUserPhoneSha1(userId, phoneSha1);
    }

    @Override
    public int initPrizeCount(Long start, Long stop) {
        List<SysUser> userList = userMapper.getUserListLimit(start, stop);
        for (SysUser sysUser : userList) {
            Long count = userSignInRecordsMapper.selectChildSign(sysUser.getUserId());
            BigDecimal a = new BigDecimal(count);
            BigDecimal b = new BigDecimal(5);
            BigDecimal[] quotientAndRemainder = a.divideAndRemainder(b);
            BigDecimal quotient = quotientAndRemainder[0]; // 商
            BigDecimal remainder = quotientAndRemainder[1]; // 余数
            sysUser.setPrizeCount(quotient.toString());
            sysUser.setPrizeProgress(remainder.toString());
            userMapper.updateUser(sysUser);
        }

        return 0;
    }

    @Override
    public void addPrizeCount(Long userId) {
        SysUser curr = userMapper.selectUserById(userId);
        SysUser sysUser = userMapper.selectUserById(Long.parseLong(curr.getParentId()));
        String prizeCount = sysUser.getPrizeCount();
        String prizeProgress = sysUser.getPrizeProgress();
        prizeProgress = StringUtils.add(prizeProgress, "1");
        if (StringUtils.greaterThan(prizeProgress, "5")) {
            prizeCount = StringUtils.add(prizeCount, "1");
            prizeProgress = "0";
        }
        sysUser.setPrizeCount(prizeCount);
        sysUser.setPrizeProgress(prizeProgress);
        userMapper.updateUser(sysUser);
    }

    @Override
    public void minusPrizeCount(Long userId) {
        SysUser sysUser = userMapper.selectUserById(userId);
        String prizeCount = sysUser.getPrizeCount();
        prizeCount = StringUtils.minus(prizeCount, "1");
        sysUser.setPrizeCount(prizeCount);
        userMapper.updateUser(sysUser);
    }

    @Override
    public String getPrizeCount(Long userId) {
        SysUser sysUser = userMapper.selectUserById(userId);
        return sysUser.getPrizeCount();
    }
}
